home *** CD-ROM | disk | FTP | other *** search
/ Invisible Universe / Invisible Universe (1995)(Voyager)[Mac-PC].iso / mac / MOVIES / FIND.DIR / 00015_Script_idling code < prev    next >
Text File  |  1995-11-13  |  414b  |  23 lines
  1. on exitFrame
  2.   global gGlossPalette, gGlossOffScreen
  3.   
  4.   if not gGlossOffScreen then
  5.     if not voidP(gGlossPalette) then tell gGlossPalette to idler
  6.   end if 
  7.   
  8.   set m = the movie
  9.   set f = the frame
  10.   testOverheadMenu
  11.   if f <> the frame or m <> the movie then exit
  12.  
  13.   go to the frame
  14. end
  15.  
  16. on keyDown
  17.   if the key <> RETURN then 
  18.     pass
  19.   else
  20.     dontPassEvent
  21.   end if  
  22. end keyDown
  23.